home *** CD-ROM | disk | FTP | other *** search
/ The PC-SIG Library 9 / The PC-SIG Library on CD ROM - Ninth Edition.iso / 801_900 / DISK0859 / DISK0859.ZIP / MAC / TEST.MAC < prev    next >
Text File  |  1987-08-13  |  459b  |  23 lines
  1. TEST     MACRO    ?,?,?,?,?,?,?,TIME=YES
  2.      DC    0H'0'
  3.      DC    AL1(XXX&N$-*-5),AL1(L'XXX&N$-1),CL1'&TIME',X'00'
  4.      AIF    &3=?.X2
  5.      AIF    &4=?.X3
  6.      AIF    &5=?.X4
  7.      AIF    &6=?.X5
  8. .X6     &1    &2,&3,&4,&5,&6
  9. XXX&N$     DC    C'&1  &2,&3,&4,&5,&6 '
  10.      AGO    .END
  11. .X5     &1    &2,&3,&4,&5
  12. XXX&N$     DC    C'&1  &2,&3,&4,&5 '
  13.      AGO    .END
  14. .X4     &1    &2,&3,&4
  15. XXX&N$     DC    C'&1  &2,&3,&4 '
  16.      AGO    .END
  17. .X3     &1    &2,&3
  18. XXX&N$     DC    C'&1  &2,&3 '
  19.      AGO    .END
  20. .X2     &1    &2
  21. XXX&N$     DC    C'&1  &2 '
  22. .END     ANOP
  23.